Sports Illustrated for Kids - Awesome Athletes!/Sports Illustrated for Kids - Awesome Athletes!.iso/th.dir/00003_QTVR.ls

Text File | 1996-04-18 | 4.0 KB | 210 lines

on initVR
  global gSISystem
  if gSISystem = "MAC" then
    MAC_initVR()
  else
    if gSISystem = "WIN" then
      WIN_initVR()
    end if
  end if
end

on cleanUpVR
  global gSISystem
  if gSISystem = "MAC" then
    MAC_cleanUpVR()
  else
    if gSISystem = "WIN" then
      WIN_cleanUpVR()
    end if
  end if
end

on OpenNavMovie pFilename, pSpriteNum, pShowOnOpen
  global gSISystem
  if gSISystem = "MAC" then
    MAC_OpenNavMovie(pFilename, pSpriteNum, pShowOnOpen)
  else
    if gSISystem = "WIN" then
      WIN_OpenNavMovie(pFilename, pSpriteNum, pShowOnOpen)
    end if
  end if
end

on ShowNavMovie
  global gSISystem
  if gSISystem = "MAC" then
    MAC_ShowNavMovie()
  else
    if gSISystem = "WIN" then
      WIN_ShowNavMovie()
    end if
  end if
end

on SetNavMovieView pHPan, pVPan
  global gSISystem
  if gSISystem = "MAC" then
    MAC_SetNavMovieView(pHPan, pVPan)
  else
    if gSISystem = "WIN" then
      WIN_SetNavMovieView(pHPan, pVPan)
    end if
  end if
end

on CloseNavMovie
  global gSISystem
  if gSISystem = "MAC" then
    MAC_CloseNavMovie()
  else
    if gSISystem = "WIN" then
      WIN_CloseNavMovie()
    end if
  end if
end

on NavFrameScript pSpriteNum
  global gSISystem
  if gSISystem = "MAC" then
    MAC_NavFrameScript(pSpriteNum)
  else
    if gSISystem = "WIN" then
      WIN_NavFrameScript(pSpriteNum)
    end if
  end if
end

on OpenPanoMovie pFilename, pSpriteNum, pShowOnOpen
  global gSISystem
  if gSISystem = "MAC" then
    MAC_OpenPanoMovie(pFilename, pSpriteNum, pShowOnOpen)
  else
    if gSISystem = "WIN" then
      WIN_OpenPanoMovie(pFilename, pSpriteNum, pShowOnOpen)
    end if
  end if
end

on InitPanoCallbacks
  global gSISystem
  if gSISystem = "MAC" then
    MAC_InitPanoCallbacks()
  else
    if gSISystem = "WIN" then
      WIN_InitPanoCallbacks()
    end if
  end if
end

on ShowPanoMovie pQuality
  global gSISystem
  if gSISystem = "MAC" then
    MAC_ShowPanoMovie(pQuality)
  else
    if gSISystem = "WIN" then
      WIN_ShowPanoMovie(pQuality)
    end if
  end if
end

on SetPanoNode pNodeID, pUpdate, pQuality
  global gSISystem
  if gSISystem = "MAC" then
    MAC_SetPanoNode(pNodeID, pUpdate, pQuality)
  else
    if gSISystem = "WIN" then
      WIN_SetPanoNode(pNodeID, pUpdate, pQuality)
    end if
  end if
end

on SwingPanoMovie pHPan, pVPan, pZoom, pSwingSpeed, pSwingQuality, pFinalQuality
  global gSISystem
  if gSISystem = "MAC" then
    MAC_SwingPanoMovie(pHPan, pVPan, pZoom, pSwingSpeed, pSwingQuality, pFinalQuality)
  else
    if gSISystem = "WIN" then
      WIN_SwingPanoMovie(pHPan, pVPan, pZoom, pSwingSpeed, pSwingQuality, pFinalQuality)
    end if
  end if
end

on SetPanoMovieView pHPan, pVPan, pZoom, pQuality
  global gSISystem
  if gSISystem = "MAC" then
    MAC_SetPanoMovieView(pHPan, pVPan, pZoom, pQuality)
  else
    if gSISystem = "WIN" then
      WIN_SetPanoMovieView(pHPan, pVPan, pZoom, pQuality)
    end if
  end if
end

on ClosePanoMovie
  global gSISystem
  if gSISystem = "MAC" then
    MAC_ClosePanoMovie()
  else
    if gSISystem = "WIN" then
      WIN_ClosePanoMovie()
    end if
  end if
end

on PanoFrameScript pSpriteNum
  global gSISystem
  if gSISystem = "MAC" then
    MAC_PanoFrameScript(pSpriteNum)
  else
    if gSISystem = "WIN" then
      WIN_PanoFrameScript(pSpriteNum)
    end if
  end if
end

on PanoGetHPanAngle
  global gSISystem
  if gSISystem = "MAC" then
    put "duck"
    return MAC_PanoGetHPanAngle()
  else
    if gSISystem = "WIN" then
      return WIN_PanoGetHPanAngle()
    end if
  end if
end

on PanoGetVPanAngle
  global gSISystem
  if gSISystem = "MAC" then
    return MAC_PanoGetVPanAngle()
  else
    if gSISystem = "WIN" then
      return WIN_PanoGetVPanAngle()
    end if
  end if
end

on PanoGetZoomAngle
  global gSISystem
  if gSISystem = "MAC" then
    return MAC_PanoGetZoomAngle()
  else
    if gSISystem = "WIN" then
      return WIN_PanoGetZoomAngle()
    end if
  end if
end

on ExtractPathName pPathName
  global gSISystem
  if gSISystem = "MAC" then
    MAC_ExtractPathName(pPathName)
  else
    if gSISystem = "WIN" then
      WIN_ExtractPathName(pPathName)
    end if
  end if
end